home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 October
/
Chip_2001-10_cd1.bin
/
zkuste
/
delphi
/
kompon
/
d123456
/
CHEMPLOT.ZIP
/
TPlot
/
BCB Demo
/
Normal1.h
< prev
Wrap
C/C++ Source or Header
|
2001-07-25
|
3KB
|
79 lines
//---------------------------------------------------------------------------
#ifndef Normal1H
#define Normal1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "Plot.hpp"
#include "PlotMenu.hpp"
#include <ExtCtrls.hpp>
#include <Menus.hpp>
#include <Grids.hpp>
#include <Buttons.hpp>
#include "NEdit.hpp"
#include "Nedit.hpp"
#include "Plotimagelist.hpp"
#include "Plotmenu.hpp"
#include "Plottoolbar.hpp"
#include <ComCtrls.hpp>
#include <ToolWin.hpp>
//---------------------------------------------------------------------------
typedef TSeries* PSeries;
#define PI 3.1415926535897
#define RADIUS 50
class TMainForm : public TForm
{
__published: // IDE-managed Components
TStringGrid *StringGrid1;
TPanel *Panel1;
TLabel *Label1;
TLabel *Label2;
TLabel *Label3;
TLabel *Label4;
TLabel *Label5;
TBitBtn *GoBitBtn;
TBitBtn *PlotTypeBitBtn;
TBitBtn *BitBtn3;
TBitBtn *GoCrazyBitBtn;
TBitBtn *TraceBitBtn;
TBitBtn *ClearAllBitBtn;
TNEdit *MinNEdit;
TNEdit *MaxNEdit;
TNEdit *StepSizeNEdit;
TNEdit *MeanNEdit;
TNEdit *StdDevNEdit;
TStatusBar *StatusBar1;
void __fastcall FormCreate(TObject *Sender);
void __fastcall ExitMenuItemClick(TObject *Sender);
void __fastcall GoBitBtnClick(TObject *Sender);
void __fastcall PlotTypeBitBtnClick(TObject *Sender);
void __fastcall BitBtn3Click(TObject *Sender);
void __fastcall TraceBitBtnClick(TObject *Sender);
void __fastcall ClearAllBitBtnClick(TObject *Sender);
void __fastcall GoCrazyBitBtnClick(TObject *Sender);
void __fastcall CrazyTimerTimer(TObject *Sender);
void __fastcall MyPlotFileOpen(TObject *Sender, AnsiString TheFile);
void __fastcall FormActivate(TObject *Sender);
void __fastcall Plot1AfterPaint(TObject *Sender, TCanvas *ACanvas);
private: // User declarations
Integer Revolutions, StartWidth, StartHeight;
Single Angle, AngleInc;
TDateTime ElapsedTime, StartTime;
TPlot *MyPlot;
TPlotImageList *MyPlotImageList;
TPlotToolBar *MyPlotToolBar;
TPlotMenu *MyPlotMenu;
TStringList *TheXStringData;
public: // User declarations
__fastcall TMainForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMainForm *MainForm;
//---------------------------------------------------------------------------
#endif